# maybe display only a subset of models
selected.models = c(
  "vbs",
  "singleBestByPar",

  "randomForest",
  "lm",
  "rpart",
  "ksvm",
  "XMeans"
)

# make names more readable
convertModelNames = function(x) {
  x = str_replace(x, "classif\\.", "")
  x = str_replace(x, "regr\\.", "")
  x = str_replace(x, ".*/", "")
  # x = str_replace(x, "bayes/", "")
  #x = str_replace(x, "singleBestByPar", "Par10")
  #x = str_replace(x, "randomForest", "Forest")
  #x = str_replace(x, "ksvm", "SVM")
  return(x)
}

# make names more readable
convertScenarioNames = function(x) {
  x = toupper(x)
  x = str_replace_all(x, "_", "-")
  #x = mapValues(x, "PREMARSHALLING-ASTAR-2013", "PREMARSHALLING")
  return(x)
}

proborder = c("SAT11-HAND", "SAT11-INDU", "SAT11-RAND", "SAT12-ALL", "SAT12-HAND", "SAT12-INDU", "SAT12-RAND", "QBF-2011", "MAXSAT12-PMS", "CSP-2010", "PROTEUS-2014", "ASP-POTASSCO", "PREMARSHALLING-ASTAR-2013")
